home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Revista CD Expert 8
/
Revista CD Expert nº 08 CD1.iso
/
Utilitarios
/
Graficos
/
EasySkin
/
Easyskin.exe
/
0
/
RCDATA
/
TFRMMAIN
/
TFRMMAIN.txt
< prev
Wrap
Text File
|
1998-11-03
|
24KB
|
1,015 lines
object frmMain: TfrmMain
Left = 210
Top = 103
Width = 544
Height = 450
Caption = 'Easy skin generator (C)opyfree 1998 by Rob Vonk'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object ColorBox1: TColorBox
Left = 488
Top = 162
Width = 25
Height = 25
Picture.Data = {<image000.bmp>}
OnDblClick = ColorDblClick
Red = 0
Green = 0
Blue = 128
Color = clNavy
OnColorChange = clr2ColorChange
end
object ColorBox2: TColorBox
Left = 488
Top = 146
Width = 25
Height = 25
Picture.Data = {<image001.bmp>}
OnDblClick = ColorDblClick
Red = 0
Green = 0
Blue = 128
Color = clNavy
OnColorChange = clr2ColorChange
end
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 536
Height = 423
ActivePage = tabVisColor
Align = alClient
TabOrder = 0
object tabVisColor: TTabSheet
Caption = 'VisColor'
ImageIndex = 4
object imgVisColorMain: TImage
Left = 242
Top = 17
Width = 275
Height = 118
IncrementalDisplay = True
OnClick = imgVisColorMainClick
OnMouseMove = imgVisColorMainMouseMove
end
object LabelRGB: TLabel
Left = 8
Top = 17
Width = 84
Height = 16
Caption = 'Color (R, G, B)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object imgVisColorExample: TImage
Left = 242
Top = 140
Width = 275
Height = 118
IncrementalDisplay = True
end
object clrCurrent: TColorBox
Left = 200
Top = 17
Width = 25
Height = 25
Picture.Data = {<image002.bmp>}
OnDragDrop = clrDragDrop
OnMouseMove = clrMouseMove
Red = 0
Green = 0
Blue = 0
Color = clBlack
end
object clr1: TColorBox
Left = 200
Top = 44
Width = 25
Height = 25
Picture.Data = {<image003.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 255
Green = 255
Blue = 255
Color = clWhite
OnColorChange = clr1ColorChange
end
object clr2: TColorBox
Left = 200
Top = 71
Width = 25
Height = 25
Picture.Data = {<image004.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 0
Green = 0
Blue = 128
Color = clNavy
OnColorChange = clr2ColorChange
end
object Clr3: TColorBox
Left = 200
Top = 98
Width = 25
Height = 25
Picture.Data = {<image005.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 255
Green = 255
Blue = 255
Color = clWhite
OnColorChange = ClrTextChange
end
object imgText: TImage
Left = 240
Top = 272
Width = 155
Height = 18
Picture.Data = {<image006.bmp>}
end
object Clr4: TColorBox
Left = 200
Top = 125
Width = 25
Height = 25
Picture.Data = {<image007.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 0
Green = 0
Blue = 128
Color = clNavy
OnColorChange = ClrTextChange
end
object imgNumbers: TImage
Left = 240
Top = 296
Width = 99
Height = 13
Picture.Data = {<image008.bmp>}
end
object clr5: TColorBox
Left = 200
Top = 152
Width = 25
Height = 25
Picture.Data = {<image009.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 255
Green = 255
Blue = 255
Color = clWhite
OnColorChange = clrNumbersChange
end
object clr6: TColorBox
Left = 200
Top = 179
Width = 25
Height = 25
Picture.Data = {<image010.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 0
Green = 0
Blue = 128
Color = clNavy
OnColorChange = clrNumbersChange
end
object imgPlay: TImage
Left = 240
Top = 318
Width = 42
Height = 9
AutoSize = True
Picture.Data = {<image011.bmp>}
end
object Clr7: TColorBox
Left = 200
Top = 206
Width = 25
Height = 25
Picture.Data = {<image012.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 255
Green = 255
Blue = 255
Color = clWhite
OnColorChange = ClrPlayChange
end
object Clr8: TColorBox
Left = 200
Top = 233
Width = 25
Height = 25
Picture.Data = {<image013.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 0
Green = 0
Blue = 128
Color = clNavy
OnColorChange = ClrPlayChange
end
object clr9: TColorBox
Left = 200
Top = 260
Width = 25
Height = 25
Picture.Data = {<image014.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 255
Green = 0
Blue = 0
Color = clRed
OnColorChange = clr1ColorChange
end
object clr10: TColorBox
Left = 200
Top = 287
Width = 25
Height = 25
Picture.Data = {<image015.bmp>}
OnDblClick = ColorDblClick
OnDragDrop = clrDragDrop
OnDragOver = clrDragOver
OnMouseMove = clrMouseMove
Red = 255
Green = 255
Blue = 255
Color = clWhite
OnColorChange = clr1ColorChange
end
object TrbVisualisation: TTrackBar
Left = 168
Top = 254
Width = 30
Height = 65
Max = 16
Orientation = trVertical
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 10
ThumbLength = 20
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = clr1ColorChange
end
object rabVisBack: TRadioButton
Tag = 1
Left = 8
Top = 44
Width = 185
Height = 17
Caption = 'Visualisation background'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = RadioButtonClick
end
object RabVisFore: TRadioButton
Tag = 2
Left = 8
Top = 71
Width = 185
Height = 17
Caption = 'Visualisation foreground'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = RadioButtonClick
end
object radTextBack: TRadioButton
Tag = 3
Left = 8
Top = 98
Width = 185
Height = 17
Caption = 'Text background'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = RadioButtonClick
end
object RadioButton1: TRadioButton
Tag = 4
Left = 8
Top = 125
Width = 185
Height = 17
Caption = 'Text foreground'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = RadioButtonClick
end
object RadioButton2: TRadioButton
Tag = 5
Left = 8
Top = 152
Width = 185
Height = 17
Caption = 'Numbers background'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = RadioButtonClick
end
object RadioButton3: TRadioButton
Tag = 6
Left = 8
Top = 179
Width = 185
Height = 17
Caption = 'Numbers foreground'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = RadioButtonClick
end
object RadioButton4: TRadioButton
Tag = 7
Left = 8
Top = 206
Width = 185
Height = 17
Caption = 'Play background'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = RadioButtonClick
end
object RadioButton5: TRadioButton
Tag = 8
Left = 8
Top = 233
Width = 185
Height = 17
Caption = 'Play foreground'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = RadioButtonClick
end
object RabVisBottom: TRadioButton
Tag = 10
Left = 8
Top = 287
Width = 153
Height = 17
Caption = 'Visualisation bottom'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
OnClick = RadioButtonClick
end
object rabVisTop: TRadioButton
Tag = 9
Left = 8
Top = 260
Width = 137
Height = 17
Caption = 'Visualisation top'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
OnClick = RadioButtonClick
end
object btnSaveVisual: TButton
Left = 353
Top = 361
Width = 75
Height = 25
Caption = 'Save visual'
TabOrder = 11
OnClick = btnSaveVisualClick
end
object btnLoad: TButton
Left = 19
Top = 361
Width = 75
Height = 25
Caption = 'Load main'
TabOrder = 12
OnClick = btnLoadClick
end
object btnLoadViscolor: TButton
Left = 104
Top = 361
Width = 75
Height = 25
Caption = 'Load color'
TabOrder = 13
OnClick = btnLoadViscolorClick
end
end
object TabMain: TTabSheet
Caption = 'Main image'
TabVisible = False
object boxMain: TGroupBox
Left = 11
Top = 38
Width = 295
Height = 145
Caption = 'Main bitmap'
TabOrder = 0
object imgMain: TImage
Left = 10
Top = 17
Width = 275
Height = 118
IncrementalDisplay = True
Picture.Data = {<image016.bmp>}
end
end
object boxButtons: TGroupBox
Left = 11
Top = 193
Width = 295
Height = 145
Caption = 'Extracted Buttons'
TabOrder = 1
object imgTitle: TImage
Left = 11
Top = 20
Width = 275
Height = 15
end
object imgVolume: TImage
Left = 117
Top = 77
Width = 68
Height = 15
end
object imgMono: TImage
Left = 221
Top = 61
Width = 29
Height = 12
end
object imgEQ: TImage
Left = 229
Top = 78
Width = 46
Height = 12
end
object imgReplay: TImage
Left = 220
Top = 109
Width = 28
Height = 15
end
object imgShuffle: TImage
Left = 174
Top = 109
Width = 47
Height = 15
end
object imgEject: TImage
Left = 146
Top = 109
Width = 22
Height = 16
end
object imgButtons: TImage
Left = 26
Top = 108
Width = 114
Height = 18
end
object imgSter: TImage
Left = 249
Top = 61
Width = 29
Height = 12
end
object imgMenu: TImage
Left = 20
Top = 42
Width = 8
Height = 43
end
object imgPosbar: TImage
Left = 15
Top = 94
Width = 250
Height = 10
end
end
end
object TabWinamp: TTabSheet
Caption = 'Winamp bitmaps'
object boxTitleBMP: TGroupBox
Left = 9
Top = 63
Width = 364
Height = 114
Caption = 'Titlebar.bmp'
TabOrder = 0
object titlebar: TImage
Left = 9
Top = 17
Width = 344
Height = 87
Picture.Data = {<image017.bmp>}
PopupMenu = pmnSave
end
end
object boxShufRepBMP: TGroupBox
Left = 8
Top = 227
Width = 114
Height = 116
Caption = 'Shufrep.bmp'
TabOrder = 1
object shufrep: TImage
Left = 11
Top = 19
Width = 92
Height = 85
PopupMenu = pmnSave
end
end
object boxMonostereoBMP: TGroupBox
Left = 291
Top = 227
Width = 83
Height = 116
Caption = 'Monoster.bmp'
TabOrder = 2
object monoster: TImage
Left = 11
Top = 19
Width = 58
Height = 24
PopupMenu = pmnSave
end
end
object boxButtonsBMP: TGroupBox
Left = 129
Top = 227
Width = 156
Height = 116
Caption = 'Cbuttons.bmp'
TabOrder = 3
object CButtons: TImage
Left = 11
Top = 19
Width = 136
Height = 36
PopupMenu = pmnSave
end
end
object boxPosbarBMP: TGroupBox
Left = 9
Top = 179
Width = 364
Height = 38
Caption = 'Posbar.bmp'
TabOrder = 4
object Posbar: TImage
Left = 8
Top = 17
Width = 307
Height = 10
Picture.Data = {<image018.bmp>}
PopupMenu = pmnSave
end
end
object btnSave: TButton
Left = 353
Top = 361
Width = 75
Height = 25
Caption = 'Save all'
TabOrder = 5
OnClick = btnSaveClick
end
object boxVolumeBMP: TGroupBox
Left = 379
Top = 7
Width = 110
Height = 336
Caption = 'Volume.bmp'
TabOrder = 6
object ScrollBox1: TScrollBox
Left = 9
Top = 19
Width = 91
Height = 308
HorzScrollBar.Visible = False
BorderStyle = bsNone
TabOrder = 0
object volume: TImage
Left = 3
Top = 0
Width = 70
Height = 433
Picture.Data = {<image019.bmp>}
PopupMenu = pmnSave
end
end
end
object GroupBox1: TGroupBox
Left = 195
Top = 8
Width = 177
Height = 49
Caption = 'Masks'
TabOrder = 7
object cmbMasks: TComboBox
Left = 11
Top = 16
Width = 154
Height = 21
ItemHeight = 0
TabOrder = 0
Text = 'default'
OnChange = cmbMasksChange
end
end
object GroupBox2: TGroupBox
Left = 11
Top = 8
Width = 177
Height = 49
Caption = 'Templates'
TabOrder = 8
object cmbTemplates: TComboBox
Left = 11
Top = 16
Width = 154
Height = 21
ItemHeight = 0
TabOrder = 0
Text = 'default'
OnChange = cmbTemplatesChange
end
end
end
object TabMask: TTabSheet
Caption = 'Masks'
TabVisible = False
object boxMaskCButtons: TGroupBox
Left = 133
Top = 162
Width = 157
Height = 66
Caption = 'Mask for CButtons'
TabOrder = 0
object imgMaskcbuttons: TImage
Left = 11
Top = 17
Width = 136
Height = 36
Picture.Data = {<image020.bmp>}
PopupMenu = pmnSave
Transparent = True
end
end
object boxMaskshufrep: TGroupBox
Left = 12
Top = 45
Width = 113
Height = 111
Caption = 'Mask for Shufrep'
TabOrder = 1
object imgMaskShufRep: TImage
Left = 8
Top = 15
Width = 92
Height = 85
Picture.Data = {<image021.bmp>}
PopupMenu = pmnSave
Transparent = True
end
end
object boxMaskMonoster: TGroupBox
Left = 12
Top = 162
Width = 111
Height = 55
Caption = 'Mask for Monoster'
TabOrder = 2
object imgMaskMonoSter: TImage
Left = 8
Top = 19
Width = 58
Height = 24
Picture.Data = {<image022.bmp>}
PopupMenu = pmnSave
Transparent = True
end
end
object boxMaskTitleBar: TGroupBox
Left = 132
Top = 45
Width = 365
Height = 111
Caption = 'Mask for TitleBar'
TabOrder = 3
object imgMaskTitleBar: TImage
Left = 9
Top = 15
Width = 344
Height = 87
Picture.Data = {<image023.bmp>}
PopupMenu = pmnSave
Transparent = True
end
end
end
object TabSettings: TTabSheet
Caption = 'Settings'
object txtWorkingdir: TLabel
Left = 24
Top = 24
Width = 51
Height = 13
Caption = 'Workingdir'
end
object txtWinampDir: TLabel
Left = 24
Top = 56
Width = 52
Height = 13
Caption = 'WinampDir'
end
object txtTemplateDir: TLabel
Left = 24
Top = 88
Width = 57
Height = 13
Caption = 'TemplateDir'
end
object txtMaskDir: TLabel
Left = 23
Top = 118
Width = 37
Height = 13
Caption = 'Maskdir'
end
object Label1: TLabel
Left = 24
Top = 176
Width = 154
Height = 13
Caption = 'Easy skin generator 98 release 4'
end
object Label2: TLabel
Left = 24
Top = 192
Width = 140
Height = 13
Caption = '(C)opyfree 1998 by Rob Vonk'
end
object Label3: TLabel
Left = 24
Top = 208
Width = 140
Height = 13
Caption = 'Look for the latest release on:'
end
object Label4: TLabel
Left = 24
Top = 224
Width = 236
Height = 13
Caption = 'http://members.tripod.com/~EasyMTU/index.html'
end
object Label5: TLabel
Left = 24
Top = 240
Width = 390
Height = 13
Caption =
'You can send your (zipped) templates, (zipped) masks, help files' +
' and suggetions to:'
end
object Label6: TLabel
Left = 24
Top = 256
Width = 79
Height = 13
Caption = 'Rob.Vonk@cmg'
end
object Label7: TLabel
Left = 24
Top = 272
Width = 3
Height = 13
end
object Label8: TLabel
Left = 24
Top = 272
Width = 191
Height = 13
Caption = 'I'#39'll include nice ones into my next release'
end
object EditWinampDir: TEdit
Left = 91
Top = 56
Width = 334
Height = 21
TabOrder = 0
end
object btnSaveSettings: TButton
Left = 353
Top = 361
Width = 75
Height = 25
Caption = 'Save settings'
TabOrder = 1
OnClick = btnSaveSettingsClick
end
object btnWinampDir: TButton
Left = 431
Top = 56
Width = 25
Height = 21
Caption = '..'
TabOrder = 2
OnClick = btnWinampDirClick
end
object EditWorkingdir: TEdit
Left = 91
Top = 24
Width = 334
Height = 21
TabOrder = 3
end
object btnWorkingDir: TButton
Left = 432
Top = 24
Width = 25
Height = 21
Caption = '..'
TabOrder = 4
OnClick = btnWorkingDirClick
end
object EditTemplateDir: TEdit
Left = 91
Top = 89
Width = 334
Height = 21
TabOrder = 5
OnChange = EditTemplateDirChange
end
object btnTemplateDir: TButton
Left = 431
Top = 89
Width = 25
Height = 21
Caption = '..'
TabOrder = 6
OnClick = btnTemplateDirClick
end
object EditMaskDir: TEdit
Left = 91
Top = 118
Width = 334
Height = 21
TabOrder = 7
OnChange = EditMaskDirChange
end
object Button1: TButton
Left = 431
Top = 117
Width = 25
Height = 21
Caption = '..'
TabOrder = 8
OnClick = Button1Click
end
end
end
object btnExit: TButton
Left = 442
Top = 385
Width = 75
Height = 25
Caption = 'Exit'
TabOrder = 1
OnClick = btnExitClick
end
object dlgOpen: TOpenDialog
Filter = 'Bitmap|*.bmp'
Left = 270
Top = 387
end
object dlgSave: TSaveDialog
Filter = 'Bitmaps|*.bmp'
Left = 299
Top = 384
end
object pmnSave: TPopupMenu
Left = 156
Top = 346
object mnuSave: TMenuItem
Caption = 'Save as'
OnClick = mnuSaveClick
end
end
object dlgDirectory: TOpenDialog
Left = 20
Top = 344
end
object BrowseDirectoryDlg1: TBrowseDirectoryDlg
Options = [bfDirectoriesOnly]
Caption = 'Select Folder'
ShowSelectionInStatus = False
Left = 212
Top = 387
end
object ColorDialog: TColorDialog
Ctl3D = True
Left = 116
Top = 352
end
object OdlViscolor: TOpenDialog
Filter = 'viscolor|viscolor.txt'
Left = 220
Top = 352
end
end
